<?php
/* 
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */
function tf($listaContenido, $Pclaves){
    $nkey= count($Pclaves);
    unset($tf);
    for($i=0; $i<count($listaContenido); $i++){
        
        //$div=preg_match_all("/\b/", $listaContenido[$i], $parametro);
        for($j=0; $j<count($Pclaves); $j++)
        {
                $tf[$j][$i] = preg_match_all("/\b$Pclaves[$j]\b/i", $listaContenido[$i], $parametro);
                //$tf[$j][$i]=$tf[$j][$i]/$div;
        }
    }
    
    
    for($j=0; $j<count($Pclaves); $j++){
        
        $max=max($tf[$j]);
        //var_dump($max);
        for($i=0; $i<count($listaContenido); $i++)
        {
				//var_dump($tf[$j][$i]);
				if($max>1)
					$kaput=$tf[$j][$i]/$max;
				else
					$kaput=0;
                $tf[$j][$i] = 0.6*($kaput)+0.4 ;
                //$tf[$j][$i] = $tf[$j][$i]/$max;
                //var_dump($tf[$j][$i]);
        }
    }
    
    return $tf;
}

function df($listaContenido, $Pclaves, $tf){
    	for($i=0; $i<count($Pclaves); $i++)
        {
                $cont = 0;
                for($j=0; $j<count($listaContenido); $j++)
                {
                        if($tf[$i][$j] > 0.4)
                                $cont = $cont + 1;
                }
                //DF
                $df[$i] = $cont;
        }
        return $df;
}

function idf($Pclaves, $df, $listaContenido){
    // Calcular IDF
    for($i=0; $i<count($Pclaves); $i++)
    {
            if($df[$i] == 0)
                    $idf[$i] = 0;
            else
                    $idf[$i] = (log10(count($listaContenido)/$df[$i])) + 1;
    }

    return $idf;
}

function matrizW($listaContenido, $Pclaves, $tf, $idf){
    // Matriz W
    for($i=0; $i<count($listaContenido); $i++)
    {
            for($j=0; $j<count($Pclaves); $j++)
            {
                $w[$j][$i] = ($tf[$j][$i] * $idf[$j]);
                    
            }
    }
    //var_dump($w);
    //Invertir W
    for($i=0; $i<count($listaContenido); $i++)
    {
            for($j=0; $j<count($Pclaves); $j++)
            {
				
                $ww[$i][$j] = $w[$j][$i];
            }
    }
    //var_dump($ww);
    return $ww;
}

?>
